home *** CD-ROM | disk | FTP | other *** search
- object Form6: TForm6
- Left = 334
- Top = 66
- Width = 790
- Height = 590
- Caption = 'Full Page Editor'
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- OldCreateOrder = True
- OnClose = FormClose
- OnDeactivate = FormDeactivate
- OnMouseMove = FormMouseMove
- OnResize = FormResize
- PixelsPerInch = 120
- TextHeight = 16
- object Label1: TLabel
- Left = 10
- Top = 507
- Width = 4
- Height = 16
- Visible = False
- end
- object Label13: TLabel
- Left = 10
- Top = 532
- Width = 484
- Height = 16
- Caption =
- 'Manual placement of selected image: drag center to move, lower r' +
- 'ight corner to size'
- end
- object PMultiImage1: TPMultiImage
- Left = 10
- Top = 10
- Width = 492
- Height = 492
- Hint =
- 'Drag image(s) using the upper left corner to place them at any l' +
- 'ocation. Drag images using the lower right corner to resize. R' +
- 'ight click on image for a list of options.'
- GrabHandCursor = 5
- Scrolling = True
- ShowScrollbars = True
- B_W_CopyFlags = [C_DEL]
- Color = clBtnFace
- ImageName = 'file not found'
- ImageReadRes = lAutoMatic
- BlitMode = sLight
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- TiffPage = 0
- TiffAppend = False
- JPegSaveQuality = 25
- JPegSaveSmooth = 5
- OnMouseDown = PMultiImage1MouseDown
- OnMouseMove = PMultiImage1MouseMove
- OnMouseUp = PMultiImage1MouseUp
- RubberBandBtn = mbLeft
- ScrollbarWidth = 12
- ParentColor = True
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = False
- Stretch = True
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 3
- TabStop = False
- ZoomBy = 10
- end
- object GroupBox2: TGroupBox
- Left = 512
- Top = 10
- Width = 257
- Height = 250
- Caption = 'Image'
- TabOrder = 0
- object Label2: TLabel
- Left = 10
- Top = 20
- Width = 63
- Height = 16
- Caption = 'File Name:'
- end
- object Label3: TLabel
- Left = 5
- Top = 39
- Width = 65
- Height = 16
- Caption = 'Resolution:'
- end
- object Label4: TLabel
- Left = 25
- Top = 59
- Width = 49
- Height = 16
- Caption = 'Created:'
- end
- object Label12: TLabel
- Left = 32
- Top = 231
- Width = 198
- Height = 16
- Caption = 'Lt click=select, Rt click=options'
- Font.Charset = ANSI_CHARSET
- Font.Color = clGreen
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label14: TLabel
- Left = 111
- Top = 187
- Width = 25
- Height = 16
- Caption = '0.00'
- end
- object Label15: TLabel
- Left = 111
- Top = 217
- Width = 25
- Height = 16
- Caption = '0.00'
- end
- object Label16: TLabel
- Left = 62
- Top = 203
- Width = 25
- Height = 16
- Caption = '0.00'
- end
- object Label17: TLabel
- Left = 160
- Top = 203
- Width = 25
- Height = 16
- Caption = '0.00'
- end
- object Label18: TLabel
- Left = 5
- Top = 187
- Width = 49
- Height = 16
- Caption = 'Location'
- end
- object GroupBox1: TGroupBox
- Left = 5
- Top = 76
- Width = 247
- Height = 112
- Caption = 'Actual Print Size (in)'
- TabOrder = 1
- object Label7: TLabel
- Left = 69
- Top = 59
- Width = 100
- Height = 16
- Caption = 'Apply Change to:'
- end
- object Label5: TLabel
- Left = 79
- Top = 34
- Width = 7
- Height = 16
- Caption = 'x'
- end
- object BitBtn3: TBitBtn
- Left = 15
- Top = 79
- Width = 99
- Height = 27
- Hint = 'Apply the above bounds to ONLY the currently selected image.'
- Caption = 'Selected'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 555555555555555555555555555555555555555555FF55555555555559055555
- 55555555577FF5555555555599905555555555557777F5555555555599905555
- 555555557777FF5555555559999905555555555777777F555555559999990555
- 5555557777777FF5555557990599905555555777757777F55555790555599055
- 55557775555777FF5555555555599905555555555557777F5555555555559905
- 555555555555777FF5555555555559905555555555555777FF55555555555579
- 05555555555555777FF5555555555557905555555555555777FF555555555555
- 5990555555555555577755555555555555555555555555555555}
- NumGlyphs = 2
- end
- object BitBtn4: TBitBtn
- Left = 133
- Top = 79
- Width = 100
- Height = 27
- Hint = 'Apply the above bounds to ALL images in the queue.'
- Caption = 'All'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = BitBtn4Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
- 3333333777333777FF33339993707399933333773337F3777FF3399933000339
- 9933377333777F3377F3399333707333993337733337333337FF993333333333
- 399377F33333F333377F993333303333399377F33337FF333373993333707333
- 333377F333777F333333993333101333333377F333777F3FFFFF993333000399
- 999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
- 99933773FF777F3F777F339993707399999333773F373F77777F333999999999
- 3393333777333777337333333999993333333333377777333333}
- NumGlyphs = 2
- end
- object Edit1: TEdit
- Left = 10
- Top = 25
- Width = 60
- Height = 24
- Hint =
- 'Enter the horizontal print bound (maximum horizontal print size)' +
- '. You may enter the horizontal measurement or the number of pri' +
- 'nts to fit across the paper (ex: enter 2x for two prints across,' +
- ' etc). '
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- end
- object BitBtn9: TBitBtn
- Left = 167
- Top = 25
- Width = 71
- Height = 27
- Hint =
- 'Swap horizontal/vertical bounds. Use this button to rotate rect' +
- 'angular (non-square) images 90 degrees CCW for better fit on the' +
- ' page. "For best fit, rotate:" must be set to "Image" on the ma' +
- 'in screen to have this affect.'
- Caption = 'Swap'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = BitBtn9Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333333333333333333333333333333333333333333333FF333333333333
- 3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
- E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
- E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
- E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
- 000033333373FF77777733333330003333333333333777333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333}
- NumGlyphs = 2
- end
- object Edit2: TEdit
- Left = 98
- Top = 25
- Width = 61
- Height = 24
- Hint =
- 'Enter the vertical print bound (maximum vertical print size). Y' +
- 'ou may enter the vertical measurement or the number of prints to' +
- ' fit down the paper (ex: enter 2x for two prints down, etc). '
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- end
- object BitBtn5: TBitBtn
- Left = 165
- Top = 49
- Width = 86
- Height = 27
- Hint = 'Click to view detailed image information'
- Caption = 'Details'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = BitBtn5Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 555555FFFFFFFFFF55555000000000055555577777777775FFFF00B8B8B8B8B0
- 0000775F5555555777770B0B8B8B8B8B0FF07F75F555555575F70FB0B8B8B8B8
- B0F07F575FFFFFFFF7F70BFB0000000000F07F557777777777570FBFBF0FFFFF
- FFF07F55557F5FFFFFF70BFBFB0F000000F07F55557F777777570FBFBF0FFFFF
- FFF075F5557F5FFFFFF750FBFB0F000000F0575FFF7F777777575700000FFFFF
- FFF05577777F5FF55FF75555550F00FF00005555557F775577775555550FFFFF
- 0F055555557F55557F755555550FFFFF00555555557FFFFF7755555555000000
- 0555555555777777755555555555555555555555555555555555}
- NumGlyphs = 2
- end
- end
- object GroupBox3: TGroupBox
- Left = 512
- Top = 260
- Width = 257
- Height = 73
- Caption = 'Page'
- TabOrder = 1
- object Label10: TLabel
- Left = 6
- Top = 53
- Width = 36
- Height = 16
- Caption = 'Go to:'
- end
- object ComboBox2: TComboBox
- Left = 49
- Top = 45
- Width = 61
- Height = 24
- Hint = 'Click on any page number to go directly to that page.'
- ItemHeight = 16
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = '1'
- OnChange = ComboBox2Change
- end
- object BitBtn10: TBitBtn
- Left = 128
- Top = 16
- Width = 119
- Height = 27
- Hint = 'Print only the current page displayed at left'
- Caption = 'Print Page'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = BitBtn10Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 0003377777777777777308888888888888807F33333333333337088888888888
- 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
- 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
- 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
- 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
- 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
- 33333337FFFF7733333333300000033333333337777773333333}
- NumGlyphs = 2
- end
- object BitBtn7: TBitBtn
- Left = 128
- Top = 45
- Width = 119
- Height = 25
- Hint = 'Save the current page as an image file'
- Caption = 'Save Page'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = BitBtn7Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
- 7700333333337777777733333333008088003333333377F73377333333330088
- 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
- 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
- FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
- 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- end
- end
- object GroupBox4: TGroupBox
- Left = 512
- Top = 333
- Width = 257
- Height = 99
- Caption = 'Document'
- TabOrder = 2
- object Label9: TLabel
- Left = 12
- Top = 26
- Width = 101
- Height = 16
- Caption = 'Page Orientation:'
- end
- object Label11: TLabel
- Left = 6
- Top = 54
- Width = 107
- Height = 16
- Caption = 'Image Positioning:'
- end
- object ComboBox3: TComboBox
- Left = 138
- Top = 15
- Width = 109
- Height = 24
- Hint =
- 'Select portrait if images are to be printed on the paper normall' +
- 'y. Select landscape to rotate the paper 90 degrees.'
- ItemHeight = 16
- Items.Strings = (
- 'Portrait'
- 'Landscape')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = 'Portrait'
- OnChange = ComboBox3Change
- end
- object ComboBox5: TComboBox
- Left = 138
- Top = 44
- Width = 109
- Height = 24
- Hint =
- 'Manual - one image per page at specified location. Compact - mi' +
- 'nimizes paper coverage by clustering in upper left. Center - sp' +
- 'ace as far apart as possible and center on page. Template - mat' +
- 'ch sample on main screen. Optimize - rearrange print order.'
- ItemHeight = 16
- Items.Strings = (
- 'Center'
- 'Compact'
- 'Template'
- 'Optimize'
- 'Manual'
- 'Freehand')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- Text = 'Center'
- OnChange = ComboBox5Change
- end
- object CheckBox1: TCheckBox
- Left = 20
- Top = 76
- Width = 227
- Height = 21
- Hint =
- 'Check this box to print the file name, image size, and file date' +
- ' below each image on the printed page.'
- Caption = 'Print image/file information'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = CheckBox1Click
- end
- end
- object GroupBox5: TGroupBox
- Left = 512
- Top = 431
- Width = 257
- Height = 120
- Caption = 'Editor'
- TabOrder = 4
- object Label8: TLabel
- Left = 9
- Top = 27
- Width = 32
- Height = 16
- Caption = 'View:'
- end
- object ComboBox1: TComboBox
- Left = 49
- Top = 20
- Width = 159
- Height = 24
- Hint =
- 'Select "Templates Only" to show only the image name, location, a' +
- 'nd orientation (upright arrow). "Selected Image" displays one i' +
- 'mage at a time. "Thumbs/Small Images" displays only fast-loadin' +
- 'g images. "All Images" displays all images on the page.'
- ItemHeight = 16
- Items.Strings = (
- 'Templates Only'
- 'Selected Image'
- 'Thumbs/Small Images'
- 'All Images')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = 'Templates Only'
- OnChange = ComboBox1Change
- OnKeyDown = ComboBox1KeyDown
- end
- object BitBtn1: TBitBtn
- Left = 9
- Top = 53
- Width = 119
- Height = 27
- Hint = 'Previous printed page.'
- Caption = 'Prev Pg'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = BitBtn1Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
- 3333333333777F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
- 3333333777737777F333333099999990333333373F3333373333333309999903
- 333333337F33337F33333333099999033333333373F333733333333330999033
- 3333333337F337F3333333333099903333333333373F37333333333333090333
- 33333333337F7F33333333333309033333333333337373333333333333303333
- 333333333337F333333333333330333333333333333733333333}
- NumGlyphs = 2
- end
- object BitBtn2: TBitBtn
- Left = 129
- Top = 53
- Width = 120
- Height = 27
- Hint = 'Next printed page.'
- Caption = 'Next Pg'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = BitBtn2Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
- 333333333337F33333333333333033333333333333373F333333333333090333
- 33333333337F7F33333333333309033333333333337373F33333333330999033
- 3333333337F337F33333333330999033333333333733373F3333333309999903
- 333333337F33337F33333333099999033333333373333373F333333099999990
- 33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333300033333333333337773333333}
- NumGlyphs = 2
- end
- object BitBtn8: TBitBtn
- Left = 9
- Top = 82
- Width = 119
- Height = 28
- Hint =
- 'Click only once. Loading will stop after the current image fini' +
- 'shes loading.'
- Caption = 'Stop Loading'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Visible = False
- OnClick = BitBtn8Click
- end
- object BitBtn6: TBitBtn
- Left = 129
- Top = 82
- Width = 120
- Height = 28
- Caption = 'Done'
- TabOrder = 4
- OnClick = BitBtn6Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
- 03333377777777777F333301111111110333337F333333337F33330111111111
- 0333337F333333337F333301111111110333337F333333337F33330111111111
- 0333337F333333337F333301111111110333337F333333337F33330111111111
- 0333337F3333333F7F333301111111B10333337F333333737F33330111111111
- 0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
- 0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
- 0333337F377777337F333301111111110333337F333333337F33330111111111
- 0333337FFFFFFFFF7F3333000000000003333377777777777333}
- NumGlyphs = 2
- end
- end
- object PopupMenu1: TPopupMenu
- OnPopup = PopupMenu1Popup
- Left = 384
- Top = 408
- object Increasesize1: TMenuItem
- Caption = 'LARGER'
- Hint = 'Increase the horizontal and vertical bounds by 25%'
- ShortCut = 16460
- OnClick = Increasesize1Click
- end
- object Decreasesize1: TMenuItem
- Caption = 'SMALLER'
- Hint = 'Decrease the horizontal and vertical bounds by 25%'
- ShortCut = 16467
- OnClick = Decreasesize1Click
- end
- object ROTATE90degrees1: TMenuItem
- Caption = 'ROTATE 90 degrees'
- Hint = 'Rotate selected image 90 degrees'
- ShortCut = 16466
- OnClick = ROTATE90degrees1Click
- end
- object Pushtonextpage1: TMenuItem
- Caption = 'PUSH to next page'
- Hint =
- 'Insert a page break on the current image, pushing it to the next' +
- ' page'
- ShortCut = 16464
- OnClick = Pushtonextpage1Click
- end
- object Viewfullscreen1: TMenuItem
- Caption = 'VIEW full screen'
- Hint = 'View the selected image in full screen mode'
- OnClick = Viewfullscreen1Click
- end
- object Copytoclipboard1: TMenuItem
- Caption = 'COPY to clipboard'
- Hint = 'Copy the selected image to the Qimage clipboard'
- ShortCut = 16451
- OnClick = Copytoclipboard1Click
- end
- object Cuttoclipboard1: TMenuItem
- Caption = 'CUT to clipboard'
- Hint = 'Remove the selected image and place onto the Qimage clipboard'
- ShortCut = 16472
- OnClick = Cuttoclipboard1Click
- end
- object Pastefromclipboard1: TMenuItem
- Caption = 'PASTE before'
- Hint =
- 'Paste the image in the Qimage clipboard in front of the selected' +
- ' image'
- ShortCut = 16469
- OnClick = Pastefromclipboard1Click
- end
- object Pasteafter1: TMenuItem
- Caption = 'PASTE after'
- ShortCut = 16470
- OnClick = Pasteafter1Click
- end
- object EditANNOTATION1: TMenuItem
- Caption = 'TEXT annotation'
- ShortCut = 16468
- OnClick = EditANNOTATION1Click
- end
- object BATCHFilter1: TMenuItem
- Caption = 'FILTER (cutout, enhance, etc)'
- ShortCut = 16454
- OnClick = BATCHFilter1Click
- end
- end
- end
-